home *** CD-ROM | disk | FTP | other *** search
/ Interactive Quarterly / The Best of New Machine Publishing 1 - Disc 4: Interactive Quarterly.iso / pc / demos / a6 / a6.dir / 00016_MAIN toggle.ls < prev    next >
Encoding:
Text File  |  1996-08-19  |  312 b   |  15 lines
  1. on mouseDown
  2.   puppetSprite(30, 1)
  3.   set the memberNum of sprite 30 to the number of member "MAIN ON"
  4.   updateStage()
  5. end
  6.  
  7. on mouseUp
  8.   global rootpath
  9.   set the memberNum of sprite 30 to the number of member "MAIN OFF"
  10.   updateStage()
  11.   puppetSprite(30, 0)
  12.   SetReturn()
  13.   go("demos", rootpath & "TOC.dir")
  14. end
  15.